home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (PO) / Nibble Volume 12, No. 04 - 05 (1991)(MindCraft Publishing)[no boot].zip / Nibble Volume 12, No. 04 - 05 (1991)(MindCraft Publishing)[no boot].po / NIBBLE.1991:APR.VOL12.NO04 / SLIDEOUT.bas < prev    next >
BASIC Source File  |  1996-12-24  |  214b  |  1 lines
  1. 1  POKE 33,2: FOR I = 0 TO 19  STEP 4: FOR J = 1 TO 24: POKE 32,I: CALL  -912: POKE 32,38 -I: PRINT  CHR$(22);: NEXT : FOR J = 1 TO 24: POKE 32,I +2: PRINT  CHR$(22);: POKE 32,36 -I: CALL  -912: NEXT : NEXT : TEXT